﻿Imports System
Imports System.Data
Imports System.Configuration
Imports System.Linq
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.HtmlControls
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Xml.Linq



Public Class Accion
   
   'Atributos
   Private id As String
   Private valor As Double
   Private nombre As String
   

   Public Sub New()
      Me.id = ""
      Me.nombre = ""
   End Sub 'New
   
   
    Public Sub New(ByVal attrs() As String)
       
        Me.id = attrs(0)
        Me.valor = Double.Parse(attrs(1))
        Me.nombre = attrs(2)
    End Sub 'New
   
    Public Function getId() As String

        Return Me.id
    End Function 'getId
   
   
   Public Function getValor() As Double
      Return Me.valor
   End Function 'getValor
   
   
   Public Function getnombre() As String
      Return Me.nombre
   End Function 'getnombre
End Class 'Accion 
